home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1999 Spring / macformat-077.iso / Shareware Plus / Development / Akua Sweets 131 / Akua Sweets Examples / Various Tests < prev   
Encoding:
Text File  |  1999-03-04  |  212 b   |  15 lines  |  [TEXT/ToyS]
  1. on run
  2.     DelayNote()
  3. end run
  4.  
  5.  
  6. on ARATest()
  7.     set saveCfg to RA configuration "Default"
  8.     RA configuration saveCfg
  9. end ARATest
  10.  
  11.  
  12. on DelayNote()
  13.     pause for 10 with seconds timing
  14.     display dialog "Beep!"
  15. end DelayNote